﻿
Partial Class AppFront_Servicios_CerrarSesion
    Inherits System.Web.UI.Page
#Region "Eventos de la pagina"
    Protected Sub Page_Load(ByVal sender As Object, ByVal e As System.EventArgs) Handles Me.Load
        Call CerrarSesion()
    End Sub
#End Region
#Region "Funciones y Procedimientos"
    Private Sub CerrarSesion()
        Response.Buffer = True
        Response.Clear()
        Session("SESE_NID") = Nothing
        Session("USUS_NOMBRECOMPLETO") = Nothing
        Session("PEPE_NOMBRE") = Nothing
        Session("SESE_FECHA") = Nothing
        'UtilidadesPaginas.EjecutaScript("top.location='" & Request.ApplicationPath & "/Login.aspx'", Page)
        UtilidadesPaginas.EjecutaScript("top.location='" & Request.ApplicationPath & "/Login.aspx'", Page)
    End Sub
#End Region
End Class
